home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Leser 19 / Amiga Plus Leser CD 19.iso / Tools / ShareMailGiftware / TGest2ExpDemo / Installa < prev   
Encoding:
Text File  |  2002-11-17  |  801 b   |  27 lines
  1. ;
  2. ; $VER: Script di Installazione di TGest2ExpDEMO v1.0 (27.05.02)
  3. ;
  4.  
  5. (set @default-dest "Work:")
  6. (set #wrongOS   (cat "TGest2ExpDEMO necessita\n"
  7.                      "dell'OS2.0 o superiore!\n"))
  8. (set #TGest_dir (cat "Scegli il cassetto o la partizione\n"
  9.                      "dove è installato il pachetto TGest2.\n"))
  10. (set #done      (cat "TGest2ExpDEMO è stato installato\n"
  11.                      "con successo nel cassetto.\n\n"))
  12.  
  13. (set OS_ver (getversion "exec.library" (resident)))
  14. (if (< OS_ver (* 37 65536)) (abort #wrongOS))
  15.  
  16. (complete 0)
  17. (set TGest_def_dir @default-dest)
  18. (set TGest_dir (askdir (default TGest_def_dir) (prompt  #TGest_dir) (help @askdir-help)))
  19.  
  20. (complete 10)
  21. (copyfiles (source "Prog/") (dest TGest_dir) (all))
  22. (complete 100)
  23.  
  24. (message #done "\"" TGest_dir "\"")
  25.  
  26. (exit)
  27.